*******************************************************************************
* EBR
*******************************************************************************

use "dataset_east_baton_rouge_newspaper_coverage", clear

#delimit;

gr tw 
	(sc hits_ x, mlab(mylab) mlabpos(3) msym(O) col(black) msize(tiny))
	,
		legend(off)
		plotregion(style(none))
		ylab(, angle(horiz))
		xline(0, lpat(dash))
		ytitle("Normalized coverage of Alton Sterling")
		xtitle("Months from Floyd murder")
		xlab(-48(6)6)
;
		
#delimit cr

gr export "_output/figure A1 a.pdf", replace

*******************************************************************************
* FW
*******************************************************************************

use "dataset_fort_worth_newspaper_coverage", clear

drop if mi(hits_)

#delimit;

gr tw 
	(sc hits_ x, mlab(mylab) mlabpos(3) msym(O) col(black) msize(tiny))
	,
		legend(off)
		plotregion(style(none))
		ylab(, angle(horiz))
		xline(0, lpat(dash))
		ytitle("Normalized coverage of Atatiana Jefferson")
		xtitle("Months from Floyd murder")
		xscale(range(-10 10))
		;
		
#delimit cr

gr export "_output/figure A1 b.pdf", replace

*******************************************************************************
* End
*******************************************************************************
